home *** CD-ROM | disk | FTP | other *** search
/ Transactor / Transactor_08_1985_Transactor_Publishing.d64 / list freeze (.txt) < prev    next >
Commodore BASIC  |  2023-02-26  |  388b  |  15 lines
  1. 10 rem* data loader for "list freeze" *
  2. 20 cs=0
  3. 30 for i=49152 to 49172:read a:poke i,a
  4. 40 cs=cs+a:next i
  5. 50 :
  6. 60 if cs<>2031 then print"!data error!": end
  7. 65 sys 49152
  8. 70 print"list freeze activated.
  9. 80 [153]"press ctrl, shift or commodore keys to  halt program listings.
  10. 90 end
  11. 100 :
  12. 1000 data 169,  11, 141,   6,   3, 169, 192, 141
  13. 1010 data   7,   3,  96,   8, 174, 141,   2, 208
  14. 1020 data 251,  40,  76,  26, 167,
  15.